Light ROM 1/LIGHT-ROM 1 (Amiga Library Services)(1994).iso/ffdisks/d912.lha/Yak/Installation/Install Yak

Text File | 1993-10-04 | 10.2 KB | 417 lines

; ************************************************
; *
; * $VER: Install-Yak v1.52 (08.05.93)
; *
; * This is the installation script for Yak 1.52
; *
; * Copyright © 1993 Gaël Marziou
; *
; ************************************************


; ****************************
; * Set up some global variables.
; ****************************


(set Version-Yak        "1.52")
(set @default-dest "")
(set old_level @user-level)

(if (exists "LIBS:reqtools.library")
    (
     ; find reqtools.library installed version
     (set vernum-reqt-inst (getversion "libs:reqtools.library"))
     (set ver-reqt-inst (/ vernum-reqt-inst 65536))
     (set rev-reqt-inst (- vernum-reqt-inst (* ver-reqt-inst 65536) ) )
     )
)
; find reqtools.library in Yak distribution
(set vernum-reqt-yak (getversion "/libs/reqtools.library"))
(set ver-reqt-yak    (/ vernum-reqt-yak 65536))
(set rev-reqt-yak    (- vernum-reqt-yak (* ver-reqt-yak 65536) ) )

(set catalogdir "/Catalogs/")

;=============================================================================
; English strings

(set default_lang 4)

(set #bad-kick "Yak needs Kickstart 2.04 at least to run !")

(set #install-yak-msg
    (cat
        "Please select the Directory where you would like to "
        "install Yak...\n"
        "If Yak is running at the moment, please stop it "
        "because of the overlays, new Yak cannot be installed "
        "on top of the old one when this one is running."
    )
)

(set #installing-yak "Installing Yak ...")
(set #copying-reqtools "Copying reqtools.library to Libs:...")

(set #which-language  "\nWhich languages should be installed?")

(set #which-language-help
        (cat "\nThe Amiga can be operated in many different"
             " languages. If you want Yak user interface to"
             " use the same language as the Amiga Workbench"
             " then a catalog file must be copied to your"
             " system disk for each language supported.\n\n"
             " At the moment, only english and french"
             " languages are available.\n\n"
      @askoptions-help
))

(set #install-reqtools-msg
        (cat ("\n\n You have reqtools.library version %ld.%ld\n" ver-reqt-inst rev-reqt-inst)
             (" Do you want to install version %ld.%ld LIBS: ?\n" ver-reqt-yak rev-reqt-yak)
        )
)

(set #new-install-reqtools-msg
        (cat ("\n\n You haven't reqtools.library installed\n")
             ("Do you want to install version %ld.%ld in LIBS: ?\n" ver-reqt-yak rev-reqt-yak)
        )
)

(set #install-reqtools-help
        (cat "\n\nThe reqtools.library is copyright Nico François\n"
             "Yak uses it mainly for its hotkey palette.\n"
             "If you don't manage to use the hotkey palette "
             "then you should skip this part."
        )
)


(set #install-msg
        (cat ("\n\n Yak %s installation script.\n\n\n" Version-Yak)
             " This script installs Yak and related files on your Amiga.\n\n"
        )
)


(set #yak-guide "/Docs/English/Yak.guide")

(set #install-guide
        (cat    "\n\n Would you like to install the documentation for Yak"
                " which is in amigaguide format?"
        )
)

(set #install-guide-help
        (cat    "Yak documentation is in amigaguide format "
                "which is the standard Amiga hypertext facility. "
                "If you run 3.0, your amigaguide viewer is MultiView.\n"
                "If you are not running 3.0, you can find "
                "the amigaguide program on Fred Fish disk #870\n"
                "Please select the destination directory for "
                "the manual. I suggest you place the "
                "AmigaGuide© documents within the searchpath "
                "of AmigaGuide© of MultiView©"
        )
)

(set #install-def-prefs
        (cat  "\n\nYou seem to be a new Yak user, would you like to install"
              " the default yak.prefs file?"
        )
)

(set #install-def-hotkeys
        (cat  "\n\nYou seem to be a new Yak 1.5x user, would you like to install"
              " the default yak.hotkeys file which has been added in 1.5?"
        )
)

(set #no-locale-msg
    (cat "Sorry, you do not have locale.library installed. "
         "Therefore, no localization facilities will be installed."
    )
)

(set #locale-prompt
    (cat "Yak is localized, that means you may use "
         "the program in different languages. Please choose "
         "the desired languages now. The default language "
         "is english, so you do not have to select english."
    )
)

(set #locale-help
    (cat "These are the languages supported by Yak\n"
         "Simply specify the languages "
         "you prefer and the needed catalog files will be "
         "copied to the LOCALE:CATALOGS directory.\n "
         "These features are only available under Workbench 2.1 "
         "and later releases. The script assumes the needed "
         "directories to be existent."
    )
)

;=============================================================================
; French strings


(if (= @language "français")
(

(set default_lang 16)

(set #bad-kick " Yak nécessite au moins le Kickstart 2.04 pour fonctionner!")

(set #install-yak-msg
    (cat
        " Sélectionnez le répertoire ou installer Yak ..."
        "\n Si Yak fonctionne en ce moment, veuillez l'arrêter"
        " sinon l'installation de la nouvelle version échouera"
        " à cause des overlays."
    )
)

(set #installing-yak " Installation de Yak ...")
(set #copying-reqtools " Copie du fichier reqtools.library vers Libs:...")

(set #which-language "\nQuelles sont les langues à installer ?")

(set #which-language-help
        (cat "\nA partir du systéme 2.1, l'Amiga peut fonctionner dans différentes langues. "
              "Pour l'instant, seul le français et l'anglais"
             "sont disponibles\n\n"
             "Cochez les langues que vous souhaitez disponibles "
             "sur votre système\n\n"
         @askoptions-help
        )
)

(set #install-msg
        (cat "\n\nScript d'installation de Yak\n"
              " Ce script installe Yak sur votre Amiga"
              " ainsi que divers fichiers nécessaires.\n\n"
        )
)

(set #install-reqtools-msg
   (cat
    ("\n\n Vous avez déjà la reqtools.library version %ld.%ld\n" ver-reqt-inst rev-reqt-inst)
    (" Voulez-vous installer la version %ld.%ld ?\n" ver-reqt-yak rev-reqt-yak)
    )
)


(set #new-install-reqtools-msg
     (cat
      ("\n\n Vous n'avez pas la reqtools.library\n")
      (" Voulez-vous installer la version %ld.%ld ?\n" ver-reqt-yak rev-reqt-yak)
      )
)

(set #install-reqtools-help
        (cat "\n\n La reqtools.library est copyright Nico François\n"
             " Yak l'utilise principalement pour sa palette.\n"
             " Si vous ne pensez pas utiliser la touche d'appel\n"
             " de Yak faisant apparaître une palette, vous pouvez \n"
             " vous passer d'installer cette library."
        )
)

(set #install-msg
        (cat ("\n\n Script d'installation de Yak %s .\n\n\n" Version-Yak)
             " Ce script installe Yak et les fichiers nécessaires sur votre Amiga.\n\n"
        )
)

(set #yak-guide "/Docs/Français/Yak.guide")

(set #install-guide
  "\n\nVoulez-vous installer la documentation de Yak qui est au format amigaguide?"
)

(set #install-guide-help
        (cat    "La documentation de Yak est au format amigaguide "
                "qui est le format hypertexte standard Amiga."
                "Si vous avez le système 3.0, vous pouvez visualiser "
                "les fichiers amigaguide avec MultiView.\n"
                "Si vous n'avez pas le système 3.0, vous pouvez "
                "trouver le programme amigaguide sur la disquette 870 "
                "de la collection Fred Fish.\n"
                "Veuillez sélectionner un répertoire de destination "
                "pour la documentation. je vous suggère de placer "
                "vos documents AmigaGuide© dans le chemin de recherche "
                "d'AmigaGuide© ou de MultiView©."
        )
)


(set #install-def-prefs
        (cat "\n\nIl semble que vous êtes un nouvel utilisateur de Yak,"
             " voulez-vous installer le fichier par défaut yak.prefs ?"
        )
)

(set #install-def-hotkeys
        (cat "\n\nIl semble que vous êtes un nouvel utilisateur de Yak 1.5x, "
             "voulez-vous installer le fichier par défaut yak.hotkeys qui "
             "apparu avec la version 1.5 ? "
        )
)

(set #no-locale-msg
    (cat "Désolé, la locale.library n'est pas installée sur votre système. "
        " Vous ne pouvez donc pas profiter de la localisation de Yak."
    )
)

(set #locale-prompt
    (cat "Yak est localisé, Celà signifie que vous pouvez "
         "l'utiliser dans différentes langues. Veuillez choisir "
         "les langues souhaitées maintenant. La langue par défaut "
         "est l'anglais, si bien que vous n'avez pas besoin de "
         "sélectionner l'anglais."
    )
)

(set #locale-help
    (cat "Ce sont les langues supportées par Yak "
         "Spécifiez simplement les langues que "
         "vous désirez et les catalogues nécessaires seront "
         "copiés vers le répertoire LOCALE:CATALOGS.\n "
         "Cette possibilité n'existe qu'à partir de la version 2.1 "
         "du Workbench. Ce script suppose que les répertoires "
         "nécessaires existent."
    )
)



))


;=============================================================================
; MAKE SURE WE ARE RUNNING UNDER A 2.04 ROM AT LEAST

(if (< (/ (getversion) 65536) 37)
(
    (abort #bad-kick)
))


(message #install-msg)

; ASK WHERE TO INSTALL YAK

(set @default-dest
(askdir
   (prompt #install-yak-msg)
   (help @askdir-help)
   (default "SYS:wbstartup")
   )
)

(
(working #installing-yak)
(copyfiles
    (prompt "")
    (help @copyfiles-help)
    (source "/Yak")
    (dest @default-dest)
    (infos)
)
)



; SHOULD WE INSTALL REQTOOLS.LIBRARY ?


(if (exists "LIBS:reqtools.library")
    ( copyfiles
        (prompt #install-reqtools-msg)
        (help #install-reqtools-help)
        (source "/libs/reqtools.library")
        (dest "LIBS:")
        (confirm)
    )
    ( copyfiles
        (prompt #new-install-reqtools-msg)
        (help #install-reqtools-help)
        (source "/libs/reqtools.library")
        (dest "LIBS:")
        (confirm)
   )
)


; INSTALL YAK.GUIDE

(copyfiles
    (prompt #install-guide)
    (help #install-guide-help)
    (source #yak-guide)
    (dest "SYS:")
    (confirm)
    (infos)
)


; NEW USER, INSTALL DEFAULT PREFS

(if (not (exists "S:Yak.prefs"))
(copyfiles
    (prompt #install-def-prefs)
    (help @copyfiles-help)
    (source "/Default/Yak.prefs")
    (dest "S:")
    (confirm)
)
)

; NEW USER, INSTALL DEFAULT HOTKEYS

(if (not (exists "S:Yak.hotkeys"))
(copyfiles
    (prompt #install-def-hotkeys)
    (help @copyfiles-help)
    (source "/Default/Yak.hotkeys")
    (dest "S:")
    (confirm)
)
)

; IF LOCALE.LIBRARY IS EXISTING WITHIN LIBS: CHECK FOR CATALOGS

(if (not (exists "libs:locale.library"))
(
    (message #no-locale-msg)
)

; else

(
(set Langs
    (askoptions
        (prompt #locale-prompt)
        (choices
             "français"
        )
        (help #locale-help)
    )
)
)
)

;Install french catalog

(if (IN Langs 2)
(
    (working "J'installe le catalogue français")
    (copyfiles
        (source "/catalogs/français/Yak.catalog")
        (dest "LOCALE:Catalogs/français" )
    )
))